<?php
  /**
   * A class for reading Microsoft Excel (97/2003) Spreadsheets.
   *
   * Version 2.21
   *
   * Enhanced and maintained by Matt Kruse < http://mattkruse.com >
   * Maintained at http://code.google.com/p/php-excel-reader/
   *
   * Format parsing and MUCH more contributed by:
   *    Matt Roxburgh < http://www.roxburgh.me.uk >
   *
   * DOCUMENTATION
   * =============
   *   http://code.google.com/p/php-excel-reader/wiki/Documentation
   *
   * CHANGE LOG
   * ==========
   *   http://code.google.com/p/php-excel-reader/wiki/ChangeHistory
   *
   * DISCUSSION/SUPPORT
   * ==================
   *   http://groups.google.com/group/php-excel-reader-discuss/topics
   *
   * --------------------------------------------------------------------------
   *
   * Originally developed by Vadim Tkachenko under the name PHPExcelReader.
   * (http://sourceforge.net/projects/phpexcelreader)
   * Based on the Java version by Andy Khan (http://www.andykhan.com).  Now
   * maintained by David Sanders.  Reads only Biff 7 and Biff 8 formats.
   *
   * PHP versions 4 and 5
   *
   * LICENSE: This source file is subject to version 3.0 of the PHP license
   * that is available through the world-wide-web at the following URI:
   * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
   * the PHP License and are unable to obtain it through the web, please
   * send a note to license@php.net so we can mail you a copy immediately.
   *
   * @category   Spreadsheet
   * @package Spreadsheet_Excel_Reader
   * @author   Vadim Tkachenko <vt@apachephp.com>
   * @license http://www.php.net/license/3_0.txt  PHP License 3.0
   * @version CVS: $Id: reader.php 19 2007-03-13 12:42:41Z shangxiao $
   * @link     http://pear.php.net/package/Spreadsheet_Excel_Reader
   * @see   OLE, Spreadsheet_Excel_Writer
   * --------------------------------------------------------------------------
   */
  
  define('NUM_BIG_BLOCK_DEPOT_BLOCKS_POS', 0x2c);
  
  define('SMALL_BLOCK_DEPOT_BLOCK_POS', 0x3c);
  
  define('ROOT_START_BLOCK_POS', 0x30);
  
  define('BIG_BLOCK_SIZE', 0x200);
  
  define('SMALL_BLOCK_SIZE', 0x40);
  
  define('EXTENSION_BLOCK_POS', 0x44);
  
  define('NUM_EXTENSION_BLOCK_POS', 0x48);
  
  define('PROPERTY_STORAGE_BLOCK_SIZE', 0x80);
  
  define('BIG_BLOCK_DEPOT_BLOCKS_POS', 0x4c);
  
  define('SMALL_BLOCK_THRESHOLD', 0x1000);
  
  // property storage offsets
  define('SIZE_OF_NAME_POS', 0x40);
  
  define('TYPE_POS', 0x42);
  
  define('START_BLOCK_POS', 0x74);
  
  define('SIZE_POS', 0x78);
  
  define('IDENTIFIER_OLE', pack("CCCCCCCC",0xd0,0xcf,0x11,0xe0,0xa1,0xb1,0x1a,0xe1));
  
  function GetInt4d($data, $pos) {
    $value = ord($data[$pos]) | (ord($data[$pos+1]) << 8) | (ord($data[$pos+2]) << 16) | (ord($data[$pos+3]) << 24);
    
    if ($value>=4294967294) {
      $value=-2;
    }
    
    return $value;
  }
  
  // http://uk.php.net/manual/en/function.getdate.php
  function gmgetdate($ts = null){
    $k = array('seconds','minutes','hours','mday','wday','mon','year','yday','weekday','month',0);
    
    return(array_comb($k,split(":",gmdate('s:i:G:j:w:n:Y:z:l:F:U',is_null($ts)?time():$ts))));
  } 
  
  // Added for PHP4 compatibility
  function array_comb($array1, $array2) {
    $out = array();
    
    foreach ($array1 as $key => $value) {
      $out[$value] = $array2[$key];
    }
    
    return $out;
  }
  
  function v($data,$pos) {
    return ord($data[$pos]) | ord($data[$pos+1])<<8;
  }
  
  class OLERead {
    var $data = '';
    
    function OLERead(){ }
  
    function read($sFileName){
      // check if file exist and is readable (Darko Miljanovic)
      if(!is_readable($sFileName)) {
        $this->error = 1;
        return false;
      }
      $this->data = @file_get_contents($sFileName);
      if (!$this->data) {
        $this->error = 1;
        return false;
        }
        if (substr($this->data, 0, 8) != IDENTIFIER_OLE) {
        $this->error = 1;
        return false;
        }
      $this->numBigBlockDepotBlocks = GetInt4d($this->data, NUM_BIG_BLOCK_DEPOT_BLOCKS_POS);
      $this->sbdStartBlock = GetInt4d($this->data, SMALL_BLOCK_DEPOT_BLOCK_POS);
      $this->rootStartBlock = GetInt4d($this->data, ROOT_START_BLOCK_POS);
      $this->extensionBlock = GetInt4d($this->data, EXTENSION_BLOCK_POS);
      $this->numExtensionBlocks = GetInt4d($this->data, NUM_EXTENSION_BLOCK_POS);
  
      $bigBlockDepotBlocks = array();
      $pos = BIG_BLOCK_DEPOT_BLOCKS_POS;
      $bbdBlocks = $this->numBigBlockDepotBlocks;
      if ($this->numExtensionBlocks != 0) {
        $bbdBlocks = (BIG_BLOCK_SIZE - BIG_BLOCK_DEPOT_BLOCKS_POS)/4;
      }
  
      for ($i = 0; $i < $bbdBlocks; $i++) {
        $bigBlockDepotBlocks[$i] = GetInt4d($this->data, $pos);
        $pos += 4;
      }
  
  
      for ($j = 0; $j < $this->numExtensionBlocks; $j++) {
        $pos = ($this->extensionBlock + 1) * BIG_BLOCK_SIZE;
        $blocksToRead = min($this->numBigBlockDepotBlocks - $bbdBlocks, BIG_BLOCK_SIZE / 4 - 1);
  
        for ($i = $bbdBlocks; $i < $bbdBlocks + $blocksToRead; $i++) {
          $bigBlockDepotBlocks[$i] = GetInt4d($this->data, $pos);
          $pos += 4;
        }
  
        $bbdBlocks += $blocksToRead;
        if ($bbdBlocks < $this->numBigBlockDepotBlocks) {
          $this->extensionBlock = GetInt4d($this->data, $pos);
        }
      }
  
      // readBigBlockDepot
      $pos = 0;
      $index = 0;
      $this->bigBlockChain = array();
  
      for ($i = 0; $i < $this->numBigBlockDepotBlocks; $i++) {
        $pos = ($bigBlockDepotBlocks[$i] + 1) * BIG_BLOCK_SIZE;
        //echo "pos = $pos";
        for ($j = 0 ; $j < BIG_BLOCK_SIZE / 4; $j++) {
          $this->bigBlockChain[$index] = GetInt4d($this->data, $pos);
          $pos += 4 ;
          $index++;
        }
      }
  
      // readSmallBlockDepot();
      $pos = 0;
      $index = 0;
      $sbdBlock = $this->sbdStartBlock;
      $this->smallBlockChain = array();
  
      while ($sbdBlock != -2) {
        $pos = ($sbdBlock + 1) * BIG_BLOCK_SIZE;
        for ($j = 0; $j < BIG_BLOCK_SIZE / 4; $j++) {
        $this->smallBlockChain[$index] = GetInt4d($this->data, $pos);
        $pos += 4;
        $index++;
        }
        $sbdBlock = $this->bigBlockChain[$sbdBlock];
      }
  
  
      // readData(rootStartBlock)
      $block = $this->rootStartBlock;
      $pos = 0;
      $this->entry = $this->__readData($block);
      $this->__readPropertySets();
    }
  
    function __readData($bl) {
      $block = $bl;
      $pos = 0;
      $data = '';
      while ($block != -2)  {
        $pos = ($block + 1) * BIG_BLOCK_SIZE;
        $data = $data.substr($this->data, $pos, BIG_BLOCK_SIZE);
        $block = $this->bigBlockChain[$block];
      }
      return $data;
     }
  
    function __readPropertySets(){
      $offset = 0;
      while ($offset < strlen($this->entry)) {
        $d = substr($this->entry, $offset, PROPERTY_STORAGE_BLOCK_SIZE);
        $nameSize = ord($d[SIZE_OF_NAME_POS]) | (ord($d[SIZE_OF_NAME_POS+1]) << 8);
        $type = ord($d[TYPE_POS]);
        $startBlock = GetInt4d($d, START_BLOCK_POS);
        $size = GetInt4d($d, SIZE_POS);
        $name = '';
        for ($i = 0; $i < $nameSize ; $i++) {
          $name .= $d[$i];
        }
        $name = str_replace("\x00", "", $name);
        $this->props[] = array (
          'name' => $name,
          'type' => $type,
          'startBlock' => $startBlock,
          'size' => $size);
        if ((strtolower($name) == "workbook") || ( strtolower($name) == "book")) {
          $this->wrkbook = count($this->props) - 1;
        }
        if ($name == "Root Entry") {
          $this->rootentry = count($this->props) - 1;
        }
        $offset += PROPERTY_STORAGE_BLOCK_SIZE;
      }
  
    }
  
  
    function getWorkBook(){
      if ($this->props[$this->wrkbook]['size'] < SMALL_BLOCK_THRESHOLD){
        $rootdata = $this->__readData($this->props[$this->rootentry]['startBlock']);
        $streamData = '';
        $block = $this->props[$this->wrkbook]['startBlock'];
        $pos = 0;
        while ($block != -2) {
              $pos = $block * SMALL_BLOCK_SIZE;
            $streamData .= substr($rootdata, $pos, SMALL_BLOCK_SIZE);
            $block = $this->smallBlockChain[$block];
        }
        return $streamData;
      }else{
        $numBlocks = $this->props[$this->wrkbook]['size'] / BIG_BLOCK_SIZE;
        if ($this->props[$this->wrkbook]['size'] % BIG_BLOCK_SIZE != 0) {
          $numBlocks++;
        }
  
        if ($numBlocks == 0) return '';
        $streamData = '';
        $block = $this->props[$this->wrkbook]['startBlock'];
        $pos = 0;
        while ($block != -2) {
          $pos = ($block + 1) * BIG_BLOCK_SIZE;
          $streamData .= substr($this->data, $pos, BIG_BLOCK_SIZE);
          $block = $this->bigBlockChain[$block];
        }
        return $streamData;
      }
    }
  
  }
  
  define('SPREADSHEET_EXCEL_READER_BIFF8',       0x600);
  define('SPREADSHEET_EXCEL_READER_BIFF7',       0x500);
  define('SPREADSHEET_EXCEL_READER_WORKBOOKGLOBALS',   0x5);
  define('SPREADSHEET_EXCEL_READER_WORKSHEET',     0x10);
  define('SPREADSHEET_EXCEL_READER_TYPE_BOF',     0x809);
  define('SPREADSHEET_EXCEL_READER_TYPE_EOF',     0x0a);
  define('SPREADSHEET_EXCEL_READER_TYPE_BOUNDSHEET',   0x85);
  define('SPREADSHEET_EXCEL_READER_TYPE_DIMENSION', 0x200);
  define('SPREADSHEET_EXCEL_READER_TYPE_ROW',     0x208);
  define('SPREADSHEET_EXCEL_READER_TYPE_DBCELL',     0xd7);
  define('SPREADSHEET_EXCEL_READER_TYPE_FILEPASS',   0x2f);
  define('SPREADSHEET_EXCEL_READER_TYPE_NOTE',     0x1c);
  define('SPREADSHEET_EXCEL_READER_TYPE_TXO',     0x1b6);
  define('SPREADSHEET_EXCEL_READER_TYPE_RK',       0x7e);
  define('SPREADSHEET_EXCEL_READER_TYPE_RK2',     0x27e);
  define('SPREADSHEET_EXCEL_READER_TYPE_MULRK',   0xbd);
  define('SPREADSHEET_EXCEL_READER_TYPE_MULBLANK',   0xbe);
  define('SPREADSHEET_EXCEL_READER_TYPE_INDEX',   0x20b);
  define('SPREADSHEET_EXCEL_READER_TYPE_SST',     0xfc);
  define('SPREADSHEET_EXCEL_READER_TYPE_EXTSST',     0xff);
  define('SPREADSHEET_EXCEL_READER_TYPE_CONTINUE',   0x3c);
  define('SPREADSHEET_EXCEL_READER_TYPE_LABEL',   0x204);
  define('SPREADSHEET_EXCEL_READER_TYPE_LABELSST',   0xfd);
  define('SPREADSHEET_EXCEL_READER_TYPE_NUMBER',     0x203);
  define('SPREADSHEET_EXCEL_READER_TYPE_NAME',     0x18);
  define('SPREADSHEET_EXCEL_READER_TYPE_ARRAY',   0x221);
  define('SPREADSHEET_EXCEL_READER_TYPE_STRING',     0x207);
  define('SPREADSHEET_EXCEL_READER_TYPE_FORMULA',   0x406);
  define('SPREADSHEET_EXCEL_READER_TYPE_FORMULA2',   0x6);
  define('SPREADSHEET_EXCEL_READER_TYPE_FORMAT',     0x41e);
  define('SPREADSHEET_EXCEL_READER_TYPE_XF',       0xe0);
  define('SPREADSHEET_EXCEL_READER_TYPE_BOOLERR',   0x205);
  define('SPREADSHEET_EXCEL_READER_TYPE_FONT',    0x0031);
  define('SPREADSHEET_EXCEL_READER_TYPE_PALETTE',   0x0092);
  define('SPREADSHEET_EXCEL_READER_TYPE_UNKNOWN',   0xffff);
  define('SPREADSHEET_EXCEL_READER_TYPE_NINETEENFOUR', 0x22);
  define('SPREADSHEET_EXCEL_READER_TYPE_MERGEDCELLS',  0xE5);
  define('SPREADSHEET_EXCEL_READER_UTCOFFSETDAYS' , 25569);
  define('SPREADSHEET_EXCEL_READER_UTCOFFSETDAYS1904', 24107);
  define('SPREADSHEET_EXCEL_READER_MSINADAY',     86400);
  define('SPREADSHEET_EXCEL_READER_TYPE_HYPER',      0x01b8);
  define('SPREADSHEET_EXCEL_READER_TYPE_COLINFO',      0x7d);
  define('SPREADSHEET_EXCEL_READER_TYPE_DEFCOLWIDTH',  0x55);
  define('SPREADSHEET_EXCEL_READER_TYPE_STANDARDWIDTH', 0x99);
  define('SPREADSHEET_EXCEL_READER_DEF_NUM_FORMAT', "%s");
  
  
  /*
  * Main Class
  */
  class Core_SpreadsheetExcelReader {
  
    // MK: Added to make data retrieval easier
    var $colnames = array();
    var $colindexes = array();
    var $standardColWidth = 0;
    var $defaultColWidth = 0;
  
    function myHex($d) {
      if ($d < 16) return "0" . dechex($d);
      return dechex($d);
    }
    
    function dumpHexData($data, $pos, $length) {
      $info = "";
      for ($i = 0; $i <= $length; $i++) {
        $info .= ($i==0?"":" ") . $this->myHex(ord($data[$pos + $i])) . (ord($data[$pos + $i])>31? "[" . $data[$pos + $i] . "]":'');
      }
      return $info;
    }
  
    function getCol($col) {
      if (is_string($col)) {
        $col = strtolower($col);
        if (array_key_exists($col,$this->colnames)) {
          $col = $this->colnames[$col];
        }
      }
      return $col;
    }
  
    // PUBLIC API FUNCTIONS
    // --------------------
  
    function val($row, $col, $sheet=0) {
      $col = $this->getCol($col);
      
      if(array_key_exists($row, $this->sheets[$sheet]['cells']) && array_key_exists($col, $this->sheets[$sheet]['cells'][$row])) {
        $return = $this->sheets[$sheet]['cells'][$row][$col];
          
        return $return;
      }
      return "";
    }
    
    function value($row, $col, $sheet=0) {
      $return = $this->val($row, $col, $sheet);
      
      return $return;
    }
    
    function info($row,$col,$type='',$sheet=0) {
      $col = $this->getCol($col);
      if (array_key_exists('cellsInfo',$this->sheets[$sheet])
          && array_key_exists($row,$this->sheets[$sheet]['cellsInfo'])
          && array_key_exists($col,$this->sheets[$sheet]['cellsInfo'][$row])
          && array_key_exists($type,$this->sheets[$sheet]['cellsInfo'][$row][$col])) {
        return $this->sheets[$sheet]['cellsInfo'][$row][$col][$type];
      }
      return "";
    }
    
    function type($row,$col,$sheet=0) {
      return $this->info($row,$col,'type',$sheet);
    }
    
    function raw($row,$col,$sheet=0) {
      return $this->info($row,$col,'raw',$sheet);
    }
    
    function rowspan($row,$col,$sheet=0) {
      $val = $this->info($row,$col,'rowspan',$sheet);
      if ($val=="") { return 1; }
      return $val;
    }
    
    function colspan($row,$col,$sheet=0) {
      $val = $this->info($row,$col,'colspan',$sheet);
      if ($val=="") { return 1; }
      return $val;
    }
    
    function hyperlink($row,$col,$sheet=0) {
      $link = $this->sheets[$sheet]['cellsInfo'][$row][$col]['hyperlink'];
      if ($link) {
        return $link['link'];
      }
      return '';
    }
    
    function rowcount($sheet=0) {
      $qtd = $this->sheets[$sheet]['numRows'];
      
      return $qtd;
    }
    
    function colcount($sheet=0) {
      $qtd = $this->sheets[$sheet]['numCols'];
      
      return $qtd;
    }
    
    function colwidth($col,$sheet=0) {
      // Col width is actually the width of the number 0. So we have to estimate and come close
      return $this->colInfo[$sheet][$col]['width']/9142*200; 
    }
    
    function colhidden($col,$sheet=0) {
      return !!$this->colInfo[$sheet][$col]['hidden'];
    }
    
    function rowheight($row,$sheet=0) {
      return $this->rowInfo[$sheet][$row]['height'];
    }
    
    function rowhidden($row,$sheet=0) {
      return !!$this->rowInfo[$sheet][$row]['hidden'];
    }
    
    // GET THE CSS FOR FORMATTING
    // ==========================
    function style($row,$col,$sheet=0,$properties='') {
      $css = "";
      $font=$this->font($row,$col,$sheet);
      if ($font!="") {
        $css .= "font-family:$font;";
      }
      $align=$this->align($row,$col,$sheet);
      if ($align!="") {
        $css .= "text-align:$align;";
      }
      $height=$this->height($row,$col,$sheet);
      if ($height!="") {
        $css .= "font-size:$height"."px;";
      }
      $bgcolor=$this->bgColor($row,$col,$sheet);
      if ($bgcolor!="") {
        $bgcolor = $this->colors[$bgcolor];
        $css .= "background-color:$bgcolor;";
      }
      $color=$this->color($row,$col,$sheet);
      if ($color!="") {
        $css .= "color:$color;";
      }
      $bold=$this->bold($row,$col,$sheet);
      if ($bold) {
        $css .= "font-weight:bold;";
      }
      $italic=$this->italic($row,$col,$sheet);
      if ($italic) {
        $css .= "font-style:italic;";
      }
      $underline=$this->underline($row,$col,$sheet);
      if ($underline) {
        $css .= "text-decoration:underline;";
      }
      // Borders
      $bLeft = $this->borderLeft($row,$col,$sheet);
      $bRight = $this->borderRight($row,$col,$sheet);
      $bTop = $this->borderTop($row,$col,$sheet);
      $bBottom = $this->borderBottom($row,$col,$sheet);
      $bLeftCol = $this->borderLeftColor($row,$col,$sheet);
      $bRightCol = $this->borderRightColor($row,$col,$sheet);
      $bTopCol = $this->borderTopColor($row,$col,$sheet);
      $bBottomCol = $this->borderBottomColor($row,$col,$sheet);
      // Try to output the minimal required style
      if ($bLeft!="" && $bLeft==$bRight && $bRight==$bTop && $bTop==$bBottom) {
        $css .= "border:" . $this->lineStylesCss[$bLeft] .";";
      }
      else {
        if ($bLeft!="") { $css .= "border-left:" . $this->lineStylesCss[$bLeft] .";"; }
        if ($bRight!="") { $css .= "border-right:" . $this->lineStylesCss[$bRight] .";"; }
        if ($bTop!="") { $css .= "border-top:" . $this->lineStylesCss[$bTop] .";"; }
        if ($bBottom!="") { $css .= "border-bottom:" . $this->lineStylesCss[$bBottom] .";"; }
      }
      // Only output border colors if there is an actual border specified
      if ($bLeft!="" && $bLeftCol!="") { $css .= "border-left-color:" . $bLeftCol .";"; }
      if ($bRight!="" && $bRightCol!="") { $css .= "border-right-color:" . $bRightCol .";"; }
      if ($bTop!="" && $bTopCol!="") { $css .= "border-top-color:" . $bTopCol . ";"; }
      if ($bBottom!="" && $bBottomCol!="") { $css .= "border-bottom-color:" . $bBottomCol .";"; }
      
      return $css;
    }
    
    // FORMAT PROPERTIES
    // =================
    function format($row,$col,$sheet=0) {
      return $this->info($row,$col,'format',$sheet);
    }
    function formatIndex($row,$col,$sheet=0) {
      return $this->info($row,$col,'formatIndex',$sheet);
    }
    function formatColor($row,$col,$sheet=0) {
      return $this->info($row,$col,'formatColor',$sheet);
    }
    
    // CELL (XF) PROPERTIES
    // ====================
    function xfRecord($row,$col,$sheet=0) {
      $xfIndex = $this->info($row,$col,'xfIndex',$sheet);
      if ($xfIndex!="") {
        return $this->xfRecords[$xfIndex];
      }
      return null;
    }
    function xfProperty($row,$col,$sheet,$prop) {
      $xfRecord = $this->xfRecord($row,$col,$sheet);
      if ($xfRecord!=null) {
        return $xfRecord[$prop];
      }
      return "";
    }
    function align($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'align');
    }
    function bgColor($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'bgColor');
    }
    function borderLeft($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'borderLeft');
    }
    function borderRight($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'borderRight');
    }
    function borderTop($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'borderTop');
    }
    function borderBottom($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'borderBottom');
    }
    function borderLeftColor($row,$col,$sheet=0) {
      return $this->colors[$this->xfProperty($row,$col,$sheet,'borderLeftColor')];
    }
    function borderRightColor($row,$col,$sheet=0) {
      return $this->colors[$this->xfProperty($row,$col,$sheet,'borderRightColor')];
    }
    function borderTopColor($row,$col,$sheet=0) {
      return $this->colors[$this->xfProperty($row,$col,$sheet,'borderTopColor')];
    }
    function borderBottomColor($row,$col,$sheet=0) {
      return $this->colors[$this->xfProperty($row,$col,$sheet,'borderBottomColor')];
    }
  
    // FONT PROPERTIES
    // ===============
    function fontRecord($row,$col,$sheet=0) {
        $xfRecord = $this->xfRecord($row,$col,$sheet);
      if ($xfRecord!=null) {
        $font = $xfRecord['fontIndex'];
        if ($font!=null) {
          return $this->fontRecords[$font];
        }
      }
      return null;
    }
    function fontProperty($row,$col,$sheet=0,$prop) {
      $font = $this->fontRecord($row,$col,$sheet);
      if ($font!=null) {
        return $font[$prop];
      }
      return false;
    }
    function fontIndex($row,$col,$sheet=0) {
      return $this->xfProperty($row,$col,$sheet,'fontIndex');
    }
    function color($row,$col,$sheet=0) {
      $formatColor = $this->formatColor($row,$col,$sheet);
      if ($formatColor!="") {
        return $formatColor;
      }
      $ci = $this->fontProperty($row,$col,$sheet,'color');
                  return $this->rawColor($ci);
          }
          function rawColor($ci) {
      if (($ci <> 0x7FFF) && ($ci <> '')) {
        return $this->colors[$ci];
      }
      return "";
    }
    function bold($row,$col,$sheet=0) {
      return $this->fontProperty($row,$col,$sheet,'bold');
    }
    function italic($row,$col,$sheet=0) {
      return $this->fontProperty($row,$col,$sheet,'italic');
    }
    function underline($row,$col,$sheet=0) {
      return $this->fontProperty($row,$col,$sheet,'under');
    }
    function height($row,$col,$sheet=0) {
      return $this->fontProperty($row,$col,$sheet,'height');
    }
    function font($row,$col,$sheet=0) {
      return $this->fontProperty($row,$col,$sheet,'font');
    }
    
    // DUMP AN HTML TABLE OF THE ENTIRE XLS DATA
    // =========================================
    function dump($row_numbers=false,$col_letters=false,$sheet=0,$table_class='excel') {
      $out = "<table class=\"$table_class\" cellspacing=0>";
      if ($col_letters) {
        $out .= "<thead>\n\t<tr>";
        if ($row_numbers) {
          $out .= "\n\t\t<th>&nbsp</th>";
        }
        for($i=1;$i<=$this->colcount($sheet);$i++) {
          $style = "width:" . ($this->colwidth($i,$sheet)*1) . "px;";
          if ($this->colhidden($i,$sheet)) {
            $style .= "display:none;";
          }
          $out .= "\n\t\t<th style=\"$style\">" . strtoupper($this->colindexes[$i]) . "</th>";
        }
        $out .= "</tr></thead>\n";
      }
      
      $out .= "<tbody>\n";
      for($row=1;$row<=$this->rowcount($sheet);$row++) {
        $rowheight = $this->rowheight($row,$sheet);
        $style = "height:" . ($rowheight*(4/3)) . "px;";
        if ($this->rowhidden($row,$sheet)) {
          $style .= "display:none;";
        }
        $out .= "\n\t<tr style=\"$style\">";
        if ($row_numbers) {
          $out .= "\n\t\t<th>$row</th>";
        }
        for($col=1;$col<=$this->colcount($sheet);$col++) {
          // Account for Rowspans/Colspans
          $rowspan = $this->rowspan($row,$col,$sheet);
          $colspan = $this->colspan($row,$col,$sheet);
          for($i=0;$i<$rowspan;$i++) {
            for($j=0;$j<$colspan;$j++) {
              if ($i>0 || $j>0) {
                $this->sheets[$sheet]['cellsInfo'][$row+$i][$col+$j]['dontprint']=1;
              }
            }
          }
          if(!$this->sheets[$sheet]['cellsInfo'][$row][$col]['dontprint']) {
            $style = $this->style($row,$col,$sheet);
            if ($this->colhidden($col,$sheet)) {
              $style .= "display:none;";
            }
            $out .= "\n\t\t<td style=\"$style\"" . ($colspan > 1?" colspan=$colspan":"") . ($rowspan > 1?" rowspan=$rowspan":"") . ">";
            $val = $this->val($row,$col,$sheet);
            if ($val=='') { $val="&nbsp;"; }
            else { 
              $val = htmlentities($val); 
              $link = $this->hyperlink($row,$col,$sheet);
              if ($link!='') {
                $val = "<a href=\"$link\">$val</a>";
              }
            }
            $out .= "<nobr>".nl2br($val)."</nobr>";
            $out .= "</td>";
          }
        }
        $out .= "</tr>\n";
      }
      $out .= "</tbody></table>";
      return $out;
    }
    
    // --------------
    // END PUBLIC API
  
  
    var $boundsheets = array();
    var $formatRecords = array();
    var $fontRecords = array();
    var $xfRecords = array();
    var $colInfo = array();
      var $rowInfo = array();
    
    var $sst = array();
    var $sheets = array();
  
    var $data;
    var $_ole;
    var $_defaultEncoding = "UTF-8";
    var $_defaultFormat = SPREADSHEET_EXCEL_READER_DEF_NUM_FORMAT;
    var $_columnsFormat = array();
    var $_rowoffset = 1;
    var $_coloffset = 1;
  
    /**
     * List of default date formats used by Excel
     */
    var $dateFormats = array (
      0xe => "d/m/Y",
      0xf => "M-d-Y",
      0x10 => "d-M",
      0x11 => "M-Y",
      0x12 => "h:i a",
      0x13 => "h:i:s a",
      0x14 => "H:i",
      0x15 => "H:i:s",
      0x16 => "d/m/Y H:i",
      0x2d => "i:s",
      0x2e => "H:i:s",
      0x2f => "i:s.S"
    );
  
    /**
     * Default number formats used by Excel
     */
    var $numberFormats = array(
      0x1 => "0",
      0x2 => "0.00",
      0x3 => "#,##0",
      0x4 => "#,##0.00",
      0x5 => "\$#,##0;(\$#,##0)",
      0x6 => "\$#,##0;[Red](\$#,##0)",
      0x7 => "\$#,##0.00;(\$#,##0.00)",
      0x8 => "\$#,##0.00;[Red](\$#,##0.00)",
      0x9 => "0%",
      0xa => "0.00%",
      0xb => "0.00E+00",
      0x25 => "#,##0;(#,##0)",
      0x26 => "#,##0;[Red](#,##0)",
      0x27 => "#,##0.00;(#,##0.00)",
      0x28 => "#,##0.00;[Red](#,##0.00)",
      0x29 => "#,##0;(#,##0)",  // Not exactly
      0x2a => "\$#,##0;(\$#,##0)",  // Not exactly
      0x2b => "#,##0.00;(#,##0.00)",  // Not exactly
      0x2c => "\$#,##0.00;(\$#,##0.00)",  // Not exactly
      0x30 => "##0.0E+0"
    );
  
      var $colors = Array(
          0x00 => "#000000",
          0x01 => "#FFFFFF",
          0x02 => "#FF0000",
          0x03 => "#00FF00",
          0x04 => "#0000FF",
          0x05 => "#FFFF00",
          0x06 => "#FF00FF",
          0x07 => "#00FFFF",
          0x08 => "#000000",
          0x09 => "#FFFFFF",
          0x0A => "#FF0000",
          0x0B => "#00FF00",
          0x0C => "#0000FF",
          0x0D => "#FFFF00",
          0x0E => "#FF00FF",
          0x0F => "#00FFFF",
          0x10 => "#800000",
          0x11 => "#008000",
          0x12 => "#000080",
          0x13 => "#808000",
          0x14 => "#800080",
          0x15 => "#008080",
          0x16 => "#C0C0C0",
          0x17 => "#808080",
          0x18 => "#9999FF",
          0x19 => "#993366",
          0x1A => "#FFFFCC",
          0x1B => "#CCFFFF",
          0x1C => "#660066",
          0x1D => "#FF8080",
          0x1E => "#0066CC",
          0x1F => "#CCCCFF",
          0x20 => "#000080",
          0x21 => "#FF00FF",
          0x22 => "#FFFF00",
          0x23 => "#00FFFF",
          0x24 => "#800080",
          0x25 => "#800000",
          0x26 => "#008080",
          0x27 => "#0000FF",
          0x28 => "#00CCFF",
          0x29 => "#CCFFFF",
          0x2A => "#CCFFCC",
          0x2B => "#FFFF99",
          0x2C => "#99CCFF",
          0x2D => "#FF99CC",
          0x2E => "#CC99FF",
          0x2F => "#FFCC99",
          0x30 => "#3366FF",
          0x31 => "#33CCCC",
          0x32 => "#99CC00",
          0x33 => "#FFCC00",
          0x34 => "#FF9900",
          0x35 => "#FF6600",
          0x36 => "#666699",
          0x37 => "#969696",
          0x38 => "#003366",
          0x39 => "#339966",
          0x3A => "#003300",
          0x3B => "#333300",
          0x3C => "#993300",
          0x3D => "#993366",
          0x3E => "#333399",
          0x3F => "#333333",
          0x40 => "#000000",
          0x41 => "#FFFFFF",
  
          0x43 => "#000000",
          0x4D => "#000000",
          0x4E => "#FFFFFF",
          0x4F => "#000000",
          0x50 => "#FFFFFF",
          0x51 => "#000000",
  
          0x7FFF => "#000000"
      );
  
    var $lineStyles = array(
      0x00 => "",
      0x01 => "Thin",
      0x02 => "Medium",
      0x03 => "Dashed",
      0x04 => "Dotted",
      0x05 => "Thick",
      0x06 => "Double",
      0x07 => "Hair",
      0x08 => "Medium dashed",
      0x09 => "Thin dash-dotted",
      0x0A => "Medium dash-dotted",
      0x0B => "Thin dash-dot-dotted",
      0x0C => "Medium dash-dot-dotted",
      0x0D => "Slanted medium dash-dotted"
    );  
  
    var $lineStylesCss = array(
      "Thin" => "1px solid", 
      "Medium" => "2px solid", 
      "Dashed" => "1px dashed", 
      "Dotted" => "1px dotted", 
      "Thick" => "3px solid", 
      "Double" => "double", 
      "Hair" => "1px solid", 
      "Medium dashed" => "2px dashed", 
      "Thin dash-dotted" => "1px dashed", 
      "Medium dash-dotted" => "2px dashed", 
      "Thin dash-dot-dotted" => "1px dashed", 
      "Medium dash-dot-dotted" => "2px dashed", 
      "Slanted medium dash-dotte" => "2px dashed" 
    );
    
    function read16bitstring($data, $start) {
      $len = 0;
      while (ord($data[$start + $len]) + ord($data[$start + $len + 1]) > 0) $len++;
      return substr($data, $start, $len);
    }
    
    // ADDED by Matt Kruse for better formatting
    function _format_value($format,$num,$f) {
      // 49==TEXT format
      // http://code.google.com/p/php-excel-reader/issues/detail?id=7
      if ( (!$f && $format=="%s") || ($f==49) || ($format=="GENERAL") ) { 
        return array('string'=>$num, 'formatColor'=>null); 
      }
  
      // Custom pattern can be POSITIVE;NEGATIVE;ZERO
      // The "text" option as 4th parameter is not handled
      $parts = split(";", $format);
      
      $pattern = $parts[0];
      // Negative pattern
      if (count($parts)>2 && $num==0) {
        $pattern = $parts[2];
      }
      // Zero pattern
      if (count($parts)>1 && $num<0) {
        $pattern = $parts[1];
        $num = abs($num);
      }
  
      $color = "";
      $matches = array();
      $color_regex = "/^\[(BLACK|BLUE|CYAN|GREEN|MAGENTA|RED|WHITE|YELLOW)\]/i";
      if (preg_match($color_regex,$pattern,$matches)) {
        $color = strtolower($matches[1]);
        $pattern = preg_replace($color_regex,"",$pattern);
      }
      
      // In Excel formats, "_" is used to add spacing, which we can't do in HTML
      $pattern = preg_replace("/_./","",$pattern);
      
      // Some non-number characters are escaped with \, which we don't need
      $pattern = preg_replace("/\\\/","",$pattern);
      
      // Some non-number strings are quoted, so we'll get rid of the quotes
      $pattern = preg_replace("/\"/","",$pattern);
  
      // TEMPORARY - Convert # to 0
      $pattern = preg_replace("/\#/","0",$pattern);
  
      // Find out if we need comma formatting
      $has_commas = preg_match("/,/",$pattern);
      if ($has_commas) {
        $pattern = preg_replace("/,/","",$pattern);
      }
  
      // Handle Percentages
      if (preg_match("/\d(\%)([^\%]|$)/",$pattern,$matches)) {
        $num = $num * 100;
        $pattern = preg_replace("/(\d)(\%)([^\%]|$)/","$1%$3",$pattern);
      }
  
      // Handle the number itself
      $number_regex = "/(\d+)(\.?)(\d*)/";
      if (preg_match($number_regex,$pattern,$matches)) {
        $left = $matches[1];
        $dec = $matches[2];
        $right = $matches[3];
        if ($has_commas) {
          $formatted = number_format($num,strlen($right));
        }
        else {
          $sprintf_pattern = "%1.".strlen($right)."f";
          $formatted = sprintf($sprintf_pattern, $num);
        }
        $pattern = preg_replace($number_regex, $formatted, $pattern);
      }
  
      return array(
        'string'=>$pattern,
        'formatColor'=>$color
      );
    }
  
    /**
     * Constructor
     *
     * Some basic initialisation
     */
    function Core_SpreadsheetExcelReader($file='', $store_extended_info=true, $outputEncoding='') {
      $this->_ole = new OLERead();
      
      $this->setUTFEncoder('iconv');
      
      if($outputEncoding != ''){ 
        $this->setOutputEncoding($outputEncoding);
      }
      
      for ($i=1; $i<245; $i++) {
        $name = strtolower(( (($i-1)/26>=1)?chr(($i-1)/26+64):'') . chr(($i-1)%26+65));
        $this->colnames[$name] = $i;
        $this->colindexes[$i] = $name;
      }
      
      $this->store_extended_info = $store_extended_info;
    
      if($file!=""){
        $this->read($file);
      }
      
    }
  
    /**
     * Set the encoding method
     */
    function setOutputEncoding($encoding) {
      $this->_defaultEncoding = $encoding;
    }
  
    /**
     *  $encoder = 'iconv' or 'mb'
     *  set iconv if you would like use 'iconv' for encode UTF-16LE to your encoding
     *  set mb if you would like use 'mb_convert_encoding' for encode UTF-16LE to your encoding
     */
    function setUTFEncoder($encoder = 'iconv') {
      $this->_encoderFunction = '';
      if ($encoder == 'iconv') {
        $this->_encoderFunction = function_exists('iconv') ? 'iconv' : '';
      } elseif ($encoder == 'mb') {
        $this->_encoderFunction = function_exists('mb_convert_encoding') ? 'mb_convert_encoding' : '';
      }
    }
  
    function setRowColOffset($iOffset) {
      $this->_rowoffset = $iOffset;
      $this->_coloffset = $iOffset;
    }
  
    /**
     * Set the default number format
     */
    function setDefaultFormat($sFormat) {
      $this->_defaultFormat = $sFormat;
    }
  
    /**
     * Force a column to use a certain format
     */
    function setColumnFormat($column, $sFormat) {
      $this->_columnsFormat[$column] = $sFormat;
    }
  
    /**
     * Read the spreadsheet file using OLE, then parse
     */
    function read($sFileName) {
      $res = $this->_ole->read($sFileName);
  
      // oops, something goes wrong (Darko Miljanovic)
      if($res === false) {
        // check error code
        if($this->_ole->error == 1) {
          // bad file
          die('O Arquivo ' . $sFileName . ' não pode ser lido.');
        }
        // check other error codes here (eg bad fileformat, etc...)
      }
      $this->data = $this->_ole->getWorkBook();
      
      $this->_parse();
    }
  
    /**
     * Parse a workbook
     *
     * @access private
     * @return bool
     */
    function _parse() {
      $pos = 0;
      $data = $this->data;
  
      $code = v($data,$pos);
      $length = v($data,$pos+2);
      $version = v($data,$pos+4);
      $substreamType = v($data,$pos+6);
  
      $this->version = $version;
  
      if (($version != SPREADSHEET_EXCEL_READER_BIFF8) &&
        ($version != SPREADSHEET_EXCEL_READER_BIFF7)) {
        return false;
      }
  
      if ($substreamType != SPREADSHEET_EXCEL_READER_WORKBOOKGLOBALS){
        return false;
      }
  
      $pos += $length + 4;
  
      $code = v($data,$pos);
      $length = v($data,$pos+2);
  
      while ($code != SPREADSHEET_EXCEL_READER_TYPE_EOF) {
        switch ($code) {
          case SPREADSHEET_EXCEL_READER_TYPE_SST:
            $spos = $pos + 4;
            $limitpos = $spos + $length;
            $uniqueStrings = $this->_GetInt4d($data, $spos+4);
            $spos += 8;
            for ($i = 0; $i < $uniqueStrings; $i++) {
              // Read in the number of characters
              if ($spos == $limitpos) {
                $opcode = v($data,$spos);
                $conlength = v($data,$spos+2);
                if ($opcode != 0x3c) {
                  return -1;
                }
                $spos += 4;
                $limitpos = $spos + $conlength;
              }
              $numChars = ord($data[$spos]) | (ord($data[$spos+1]) << 8);
              $spos += 2;
              $optionFlags = ord($data[$spos]);
              $spos++;
              $asciiEncoding = (($optionFlags & 0x01) == 0) ;
              $extendedString = ( ($optionFlags & 0x04) != 0);
  
              // See if string contains formatting information
              $richString = ( ($optionFlags & 0x08) != 0);
  
              if ($richString) {
                // Read in the crun
                $formattingRuns = v($data,$spos);
                $spos += 2;
              }
  
              if ($extendedString) {
                // Read in cchExtRst
                $extendedRunLength = $this->_GetInt4d($data, $spos);
                $spos += 4;
              }
  
              $len = ($asciiEncoding)? $numChars : $numChars*2;
              if ($spos + $len < $limitpos) {
                $retstr = substr($data, $spos, $len);
                $spos += $len;
              }
              else{
                // found countinue
                $retstr = substr($data, $spos, $limitpos - $spos);
                $bytesRead = $limitpos - $spos;
                $charsLeft = $numChars - (($asciiEncoding) ? $bytesRead : ($bytesRead / 2));
                $spos = $limitpos;
  
                while ($charsLeft > 0){
                  $opcode = v($data,$spos);
                  $conlength = v($data,$spos+2);
                  if ($opcode != 0x3c) {
                    return -1;
                  }
                  $spos += 4;
                  $limitpos = $spos + $conlength;
                  $option = ord($data[$spos]);
                  $spos += 1;
                  if ($asciiEncoding && ($option == 0)) {
                    $len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);
                    $retstr .= substr($data, $spos, $len);
                    $charsLeft -= $len;
                    $asciiEncoding = true;
                  }
                  elseif (!$asciiEncoding && ($option != 0)) {
                    $len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);
                    $retstr .= substr($data, $spos, $len);
                    $charsLeft -= $len/2;
                    $asciiEncoding = false;
                  }
                  elseif (!$asciiEncoding && ($option == 0)) {
                    // Bummer - the string starts off as Unicode, but after the
                    // continuation it is in straightforward ASCII encoding
                    $len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);
                    for ($j = 0; $j < $len; $j++) {
                      $retstr .= $data[$spos + $j].chr(0);
                    }
                    $charsLeft -= $len;
                    $asciiEncoding = false;
                  }
                  else{
                    $newstr = '';
                    for ($j = 0; $j < strlen($retstr); $j++) {
                      $newstr = $retstr[$j].chr(0);
                    }
                    $retstr = $newstr;
                    $len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);
                    $retstr .= substr($data, $spos, $len);
                    $charsLeft -= $len/2;
                    $asciiEncoding = false;
                  }
                  $spos += $len;
                }
              }
              $retstr = ($asciiEncoding) ? $retstr : $this->_encodeUTF16($retstr);
  
              if ($richString){
                $spos += 4 * $formattingRuns;
              }
  
              // For extended strings, skip over the extended string data
              if ($extendedString) {
                $spos += $extendedRunLength;
              }
              $this->sst[]=$retstr;
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_FILEPASS:
            return false;
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_NAME:
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_FORMAT:
            $indexCode = v($data,$pos+4);
            if ($version == SPREADSHEET_EXCEL_READER_BIFF8) {
              $numchars = v($data,$pos+6);
              if (ord($data[$pos+8]) == 0){
                $formatString = substr($data, $pos+9, $numchars);
              } else {
                $formatString = substr($data, $pos+9, $numchars*2);
              }
            } else {
              $numchars = ord($data[$pos+6]);
              $formatString = substr($data, $pos+7, $numchars*2);
            }
            $this->formatRecords[$indexCode] = $formatString;
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_FONT:
              $height = v($data,$pos+4);
              $option = v($data,$pos+6);
              $color = v($data,$pos+8);
              $weight = v($data,$pos+10);
              $under  = ord($data[$pos+14]);
              $font = "";
              // Font name
              $numchars = ord($data[$pos+18]);
              if ((ord($data[$pos+19]) & 1) == 0){
                  $font = substr($data, $pos+20, $numchars);
              } else {
                  $font = substr($data, $pos+20, $numchars*2);
                  $font =  $this->_encodeUTF16($font); 
              }
              $this->fontRecords[] = array(
                  'height' => $height / 20,
                  'italic' => !!($option & 2),
                  'color' => $color,
                  'under' => !($under==0),
                  'bold' => ($weight==700),
                  'font' => $font,
                  'raw' => $this->dumpHexData($data, $pos+3, $length)
                  );
                break;
  
          case SPREADSHEET_EXCEL_READER_TYPE_PALETTE:
              $colors = ord($data[$pos+4]) | ord($data[$pos+5]) << 8;
              for ($coli = 0; $coli < $colors; $coli++) {
                  $colOff = $pos + 2 + ($coli * 4);
                    $colr = ord($data[$colOff]);
                    $colg = ord($data[$colOff+1]);
                    $colb = ord($data[$colOff+2]);
                $this->colors[0x07 + $coli] = '#' . $this->myhex($colr) . $this->myhex($colg) . $this->myhex($colb);
              }
                break;
  
          case SPREADSHEET_EXCEL_READER_TYPE_XF:
              $fontIndexCode = (ord($data[$pos+4]) | ord($data[$pos+5]) << 8) - 1;
              $fontIndexCode = max(0,$fontIndexCode);
              $indexCode = ord($data[$pos+6]) | ord($data[$pos+7]) << 8;
              $alignbit = ord($data[$pos+10]) & 3;
              $bgi = (ord($data[$pos+22]) | ord($data[$pos+23]) << 8) & 0x3FFF;
              $bgcolor = ($bgi & 0x7F);
  //            $bgcolor = ($bgi & 0x3f80) >> 7;
              $align = "";
              if ($alignbit==3) { $align="right"; }
              if ($alignbit==2) { $align="center"; }
  
              $fillPattern = (ord($data[$pos+21]) & 0xFC) >> 2;
              if ($fillPattern == 0) {
                $bgcolor = "";
              }
  
              $xf = array();
              $xf['formatIndex'] = $indexCode;
              $xf['align'] = $align;
              $xf['fontIndex'] = $fontIndexCode;
              $xf['bgColor'] = $bgcolor;
              $xf['fillPattern'] = $fillPattern;
  
              $border = ord($data[$pos+14]) | (ord($data[$pos+15]) << 8) | (ord($data[$pos+16]) << 16) | (ord($data[$pos+17]) << 24);
              $xf['borderLeft'] = $this->lineStyles[($border & 0xF)];
              $xf['borderRight'] = $this->lineStyles[($border & 0xF0) >> 4];
              $xf['borderTop'] = $this->lineStyles[($border & 0xF00) >> 8];
              $xf['borderBottom'] = $this->lineStyles[($border & 0xF000) >> 12];
              
              $xf['borderLeftColor'] = ($border & 0x7F0000) >> 16;
              $xf['borderRightColor'] = ($border & 0x3F800000) >> 23;
              $border = (ord($data[$pos+18]) | ord($data[$pos+19]) << 8);
  
              $xf['borderTopColor'] = ($border & 0x7F);
              $xf['borderBottomColor'] = ($border & 0x3F80) >> 7;
                          
              if (array_key_exists($indexCode, $this->dateFormats)) {
                $xf['type'] = 'date';
                
                $xf['format'] = $this->dateFormats[$indexCode];
                
                if ($align=='') { $xf['align'] = 'right'; }
              }
              elseif (array_key_exists($indexCode, $this->numberFormats)) {
                $xf['type'] = 'number';
                $xf['format'] = $this->numberFormats[$indexCode];
                if ($align=='') { $xf['align'] = 'right'; }
              }else{
                $isdate = FALSE;
                $formatstr = '';
                if ($indexCode > 0){
                  if (isset($this->formatRecords[$indexCode]))
                    $formatstr = $this->formatRecords[$indexCode];
                  if ($formatstr!="") {
                    $tmp = preg_replace("/\;.*/","",$formatstr);
                    $tmp = preg_replace("/^\[[^\]]*\]/","",$tmp);
                    if (preg_match("/[^hmsday\/\-:\s\\\,AMP]/i", $tmp) == 0) { // found day and time format
                      $isdate = TRUE;
                      $formatstr = $tmp;
                      $formatstr = str_replace(array('AM/PM','mmmm','mmm'), array('a','F','M'), $formatstr);
                      // m/mm are used for both minutes and months - oh SNAP!
                      // This mess tries to fix for that.
                      // 'm' == minutes only if following h/hh or preceding s/ss
                      $formatstr = preg_replace("/(h:?)mm?/","$1i", $formatstr);
                      $formatstr = preg_replace("/mm?(:?s)/","i$1", $formatstr);
                      // A single 'm' = n in PHP
                      $formatstr = preg_replace("/(^|[^m])m([^m]|$)/", '$1n$2', $formatstr);
                      $formatstr = preg_replace("/(^|[^m])m([^m]|$)/", '$1n$2', $formatstr);
                      // else it's months
                      $formatstr = str_replace('mm', 'm', $formatstr);
                      // Convert single 'd' to 'j'
                      $formatstr = preg_replace("/(^|[^d])d([^d]|$)/", '$1j$2', $formatstr);
                      $formatstr = str_replace(array('dddd','ddd','dd','yyyy','yy','hh','h'), array('l','D','d','Y','y','H','g'), $formatstr);
                      $formatstr = preg_replace("/ss?/", 's', $formatstr);
                    }
                  }
                }
                if ($isdate){
                  $xf['type'] = 'date';
                  $xf['format'] = $formatstr;
                  if ($align=='') { $xf['align'] = 'right'; }
                }else{
                  // If the format string has a 0 or # in it, we'll assume it's a number
                  if (preg_match("/[0#]/", $formatstr)) {
                    $xf['type'] = 'number';
                    if ($align=='') { $xf['align']='right'; }
                  }
                  else {
                  $xf['type'] = 'other';
                  }
                  $xf['format'] = $formatstr;
                  $xf['code'] = $indexCode;
                }
              }
              $this->xfRecords[] = $xf;
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_NINETEENFOUR:
            $this->nineteenFour = (ord($data[$pos+4]) == 1);
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_BOUNDSHEET:
              $rec_offset = $this->_GetInt4d($data, $pos+4);
              $rec_typeFlag = ord($data[$pos+8]);
              $rec_visibilityFlag = ord($data[$pos+9]);
              $rec_length = ord($data[$pos+10]);
  
              if ($version == SPREADSHEET_EXCEL_READER_BIFF8){
                $chartype =  ord($data[$pos+11]);
                if ($chartype == 0){
                  $rec_name = substr($data, $pos+12, $rec_length);
                } else {
                  $rec_name = $this->_encodeUTF16(substr($data, $pos+12, $rec_length*2));
                }
              }elseif ($version == SPREADSHEET_EXCEL_READER_BIFF7){
                  $rec_name = substr($data, $pos+11, $rec_length);
              }
            $this->boundsheets[] = array('name'=>$rec_name,'offset'=>$rec_offset);
            break;
  
        }
  
        $pos += $length + 4;
        $code = ord($data[$pos]) | ord($data[$pos+1])<<8;
        $length = ord($data[$pos+2]) | ord($data[$pos+3])<<8;
      }
  
      foreach ($this->boundsheets as $key=>$val){
        $this->sn = $key;
        $this->_parsesheet($val['offset']);
      }
      return true;
    }
  
    /**
     * Parse a worksheet
     */
    function _parsesheet($spos) {
      $cont = true;
      $data = $this->data;
      // read BOF
      $code = ord($data[$spos]) | ord($data[$spos+1])<<8;
      $length = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
  
      $version = ord($data[$spos + 4]) | ord($data[$spos + 5])<<8;
      $substreamType = ord($data[$spos + 6]) | ord($data[$spos + 7])<<8;
  
      if (($version != SPREADSHEET_EXCEL_READER_BIFF8) && ($version != SPREADSHEET_EXCEL_READER_BIFF7)) {
        return -1;
      }
  
      if ($substreamType != SPREADSHEET_EXCEL_READER_WORKSHEET){
        return -2;
      }
      $spos += $length + 4;
      while($cont) {
        $lowcode = ord($data[$spos]);
        if ($lowcode == SPREADSHEET_EXCEL_READER_TYPE_EOF) break;
        $code = $lowcode | ord($data[$spos+1])<<8;
        $length = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
        $spos += 4;
        $this->sheets[$this->sn]['maxrow'] = $this->_rowoffset - 1;
        $this->sheets[$this->sn]['maxcol'] = $this->_coloffset - 1;
        unset($this->rectype);
        switch ($code) {
          case SPREADSHEET_EXCEL_READER_TYPE_DIMENSION:
            if (!isset($this->numRows)) {
              if (($length == 10) ||  ($version == SPREADSHEET_EXCEL_READER_BIFF7)){
                $this->sheets[$this->sn]['numRows'] = ord($data[$spos+2]) | ord($data[$spos+3]) << 8;
                $this->sheets[$this->sn]['numCols'] = ord($data[$spos+6]) | ord($data[$spos+7]) << 8;
              } else {
                $this->sheets[$this->sn]['numRows'] = ord($data[$spos+4]) | ord($data[$spos+5]) << 8;
                $this->sheets[$this->sn]['numCols'] = ord($data[$spos+10]) | ord($data[$spos+11]) << 8;
              }
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_MERGEDCELLS:
            $cellRanges = ord($data[$spos]) | ord($data[$spos+1])<<8;
            for ($i = 0; $i < $cellRanges; $i++) {
              $fr =  ord($data[$spos + 8*$i + 2]) | ord($data[$spos + 8*$i + 3])<<8;
              $lr =  ord($data[$spos + 8*$i + 4]) | ord($data[$spos + 8*$i + 5])<<8;
              $fc =  ord($data[$spos + 8*$i + 6]) | ord($data[$spos + 8*$i + 7])<<8;
              $lc =  ord($data[$spos + 8*$i + 8]) | ord($data[$spos + 8*$i + 9])<<8;
              if ($lr - $fr > 0) {
                $this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['rowspan'] = $lr - $fr + 1;
              }
              if ($lc - $fc > 0) {
                $this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['colspan'] = $lc - $fc + 1;
              }
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_RK:
          case SPREADSHEET_EXCEL_READER_TYPE_RK2:
            $row = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $rknum = $this->_GetInt4d($data, $spos + 6);
            $numValue = $this->_GetIEEE754($rknum);
            $info = $this->_getCellDetails($spos,$numValue,$column);
            $this->addcell($row, $column, $info['string'],$info);
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_LABELSST:
            $row    = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column  = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $xfindex  = ord($data[$spos+4]) | ord($data[$spos+5])<<8;
            $index  = $this->_GetInt4d($data, $spos + 6);
            $this->addcell($row, $column, $this->sst[$index], array('xfIndex'=>$xfindex) );
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_MULRK:
            $row    = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $colFirst   = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $colLast  = ord($data[$spos + $length - 2]) | ord($data[$spos + $length - 1])<<8;
            $columns  = $colLast - $colFirst + 1;
            $tmppos = $spos+4;
            for ($i = 0; $i < $columns; $i++) {
              $numValue = $this->_GetIEEE754($this->_GetInt4d($data, $tmppos + 2));
              $info = $this->_getCellDetails($tmppos-4,$numValue,$colFirst + $i + 1);
              $tmppos += 6;
              $this->addcell($row, $colFirst + $i, $info['string'], $info);
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_NUMBER:
            $row  = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $tmp = unpack("ddouble", substr($data, $spos + 6, 8)); // It machine machine dependent
            if ($this->isDate($spos)) {
              $numValue = $tmp['double'];
            }
            else {
              $numValue = $this->createNumber($spos);
            }
            $info = $this->_getCellDetails($spos,$numValue,$column);
            $this->addcell($row, $column, $info['string'], $info);
            break;
  
          case SPREADSHEET_EXCEL_READER_TYPE_FORMULA:
          case SPREADSHEET_EXCEL_READER_TYPE_FORMULA2:
            $row  = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            if ((ord($data[$spos+6])==0) && (ord($data[$spos+12])==255) && (ord($data[$spos+13])==255)) {
              //String formula. Result follows in a STRING record
              // This row/col are stored to be referenced in that record
              // http://code.google.com/p/php-excel-reader/issues/detail?id=4
              $previousRow = $row;
              $previousCol = $column;
            } elseif ((ord($data[$spos+6])==1) && (ord($data[$spos+12])==255) && (ord($data[$spos+13])==255)) {
              //Boolean formula. Result is in +2; 0=false,1=true
              // http://code.google.com/p/php-excel-reader/issues/detail?id=4
                          if (ord($this->data[$spos+8])==1) {
                              $this->addcell($row, $column, "TRUE");
                          } else {
                              $this->addcell($row, $column, "FALSE");
                          }
            } elseif ((ord($data[$spos+6])==2) && (ord($data[$spos+12])==255) && (ord($data[$spos+13])==255)) {
              //Error formula. Error code is in +2;
            } elseif ((ord($data[$spos+6])==3) && (ord($data[$spos+12])==255) && (ord($data[$spos+13])==255)) {
              //Formula result is a null string.
              $this->addcell($row, $column, '');
            } else {
              // result is a number, so first 14 bytes are just like a _NUMBER record
              $tmp = unpack("ddouble", substr($data, $spos + 6, 8)); // It machine machine dependent
                  if ($this->isDate($spos)) {
                  $numValue = $tmp['double'];
                  }
                  else {
                  $numValue = $this->createNumber($spos);
                  }
              $info = $this->_getCellDetails($spos,$numValue,$column);
              $this->addcell($row, $column, $info['string'], $info);
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_BOOLERR:
            $row  = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $string = ord($data[$spos+6]);
            $this->addcell($row, $column, $string);
            break;
                  case SPREADSHEET_EXCEL_READER_TYPE_STRING:
            // http://code.google.com/p/php-excel-reader/issues/detail?id=4
            if ($version == SPREADSHEET_EXCEL_READER_BIFF8){
              // Unicode 16 string, like an SST record
              $xpos = $spos;
              $numChars =ord($data[$xpos]) | (ord($data[$xpos+1]) << 8);
              $xpos += 2;
              $optionFlags =ord($data[$xpos]);
              $xpos++;
              $asciiEncoding = (($optionFlags &0x01) == 0) ;
              $extendedString = (($optionFlags & 0x04) != 0);
                          // See if string contains formatting information
              $richString = (($optionFlags & 0x08) != 0);
              if ($richString) {
                // Read in the crun
                $formattingRuns =ord($data[$xpos]) | (ord($data[$xpos+1]) << 8);
                $xpos += 2;
              }
              if ($extendedString) {
                // Read in cchExtRst
                $extendedRunLength =$this->_GetInt4d($this->data, $xpos);
                $xpos += 4;
              }
              $len = ($asciiEncoding)?$numChars : $numChars*2;
              $retstr =substr($data, $xpos, $len);
              $xpos += $len;
              $retstr = ($asciiEncoding)? $retstr : $this->_encodeUTF16($retstr);
            }
            elseif ($version == SPREADSHEET_EXCEL_READER_BIFF7){
              // Simple byte string
              $xpos = $spos;
              $numChars =ord($data[$xpos]) | (ord($data[$xpos+1]) << 8);
              $xpos += 2;
              $retstr =substr($data, $xpos, $numChars);
            }
            $this->addcell($previousRow, $previousCol, $retstr);
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_ROW:
            $row  = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $rowInfo = ord($data[$spos + 6]) | ((ord($data[$spos+7]) << 8) & 0x7FFF);
            if (($rowInfo & 0x8000) > 0) {
              $rowHeight = -1;
            } else {
              $rowHeight = $rowInfo & 0x7FFF;
            }
            $rowHidden = (ord($data[$spos + 12]) & 0x20) >> 5;
            $this->rowInfo[$this->sn][$row+1] = Array('height' => $rowHeight / 20, 'hidden'=>$rowHidden );
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_DBCELL:
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_MULBLANK:
            $row = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $cols = ($length / 2) - 3;
            for ($c = 0; $c < $cols; $c++) {
              $xfindex = ord($data[$spos + 4 + ($c * 2)]) | ord($data[$spos + 5 + ($c * 2)])<<8;
              $this->addcell($row, $column + $c, "", array('xfIndex'=>$xfindex));
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_LABEL:
            $row  = ord($data[$spos]) | ord($data[$spos+1])<<8;
            $column = ord($data[$spos+2]) | ord($data[$spos+3])<<8;
            $this->addcell($row, $column, substr($data, $spos + 8, ord($data[$spos + 6]) | ord($data[$spos + 7])<<8));
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_EOF:
            $cont = false;
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_HYPER:
            //  Only handle hyperlinks to a URL
            $row  = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
            $row2   = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
            $column = ord($this->data[$spos+4]) | ord($this->data[$spos+5])<<8;
            $column2 = ord($this->data[$spos+6]) | ord($this->data[$spos+7])<<8;
            $linkdata = Array();
            $flags = ord($this->data[$spos + 28]);
            $udesc = "";
            $ulink = "";
            $uloc = 32;
            $linkdata['flags'] = $flags;
            if (($flags & 1) > 0 ) {   // is a type we understand
              //  is there a description ?
              if (($flags & 0x14) == 0x14 ) {   // has a description
                $uloc += 4;
                $descLen = ord($this->data[$spos + 32]) | ord($this->data[$spos + 33]) << 8;
                $udesc = substr($this->data, $spos + $uloc, $descLen * 2);
                $uloc += 2 * $descLen;
              }
              $ulink = $this->read16bitstring($this->data, $spos + $uloc + 20);
              if ($udesc == "") {
                $udesc = $ulink;
              }
            }
            $linkdata['desc'] = $udesc;
            $linkdata['link'] = $this->_encodeUTF16($ulink);
            for ($r=$row; $r<=$row2; $r++) { 
              for ($c=$column; $c<=$column2; $c++) {
                $this->sheets[$this->sn]['cellsInfo'][$r+1][$c+1]['hyperlink'] = $linkdata;
              }
            }
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_DEFCOLWIDTH:
            $this->defaultColWidth  = ord($data[$spos+4]) | ord($data[$spos+5]) << 8; 
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_STANDARDWIDTH:
            $this->standardColWidth  = ord($data[$spos+4]) | ord($data[$spos+5]) << 8; 
            break;
          case SPREADSHEET_EXCEL_READER_TYPE_COLINFO:
            $colfrom = ord($data[$spos+0]) | ord($data[$spos+1]) << 8;
            $colto = ord($data[$spos+2]) | ord($data[$spos+3]) << 8;
            $cw = ord($data[$spos+4]) | ord($data[$spos+5]) << 8; 
            $cxf = ord($data[$spos+6]) | ord($data[$spos+7]) << 8; 
            $co = ord($data[$spos+8]); 
            for ($coli = $colfrom; $coli <= $colto; $coli++) {
              $this->colInfo[$this->sn][$coli+1] = Array('width' => $cw, 'xf' => $cxf, 'hidden' => ($co & 0x01), 'collapsed' => ($co & 0x1000) >> 12);
            }
            break;
  
          default:
            break;
        }
        $spos += $length;
      }
  
      if (!isset($this->sheets[$this->sn]['numRows']))
         $this->sheets[$this->sn]['numRows'] = $this->sheets[$this->sn]['maxrow'];
      if (!isset($this->sheets[$this->sn]['numCols']))
         $this->sheets[$this->sn]['numCols'] = $this->sheets[$this->sn]['maxcol'];
      }
  
      function isDate($spos) {
        $xfindex = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;
        return ($this->xfRecords[$xfindex]['type'] == 'date');
      }
  
      // Get the details for a particular cell
      function _getCellDetails($spos,$numValue,$column) {
        $xfindex = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;
        $xfrecord = $this->xfRecords[$xfindex];
        $type = $xfrecord['type'];
  
        $format = $xfrecord['format'];
        $formatIndex = $xfrecord['formatIndex'];
        $fontIndex = $xfrecord['fontIndex'];
        $formatColor = "";
        $rectype = '';
        $string = '';
        $raw = '';
  
        if (isset($this->_columnsFormat[$column + 1])){
          $format = $this->_columnsFormat[$column + 1];
        }
  
        if ($type == 'date') {
          // See http://groups.google.com/group/php-excel-reader-discuss/browse_frm/thread/9c3f9790d12d8e10/f2045c2369ac79de
          $rectype = 'date';
          // Convert numeric value into a date
          $utcDays = floor($numValue - ($this->nineteenFour ? SPREADSHEET_EXCEL_READER_UTCOFFSETDAYS1904 : SPREADSHEET_EXCEL_READER_UTCOFFSETDAYS));
          $utcValue = ($utcDays) * SPREADSHEET_EXCEL_READER_MSINADAY;
          //echo"<br>";
          $dateinfo = gmgetdate($utcValue);
          
          /*echo"<pre>";
          print_r($dateinfo);
          echo"</pre>";*/
          
          $raw = $numValue;
          $fractionalDay = $numValue - floor($numValue) + .0000001; // The .0000001 is to fix for php/excel fractional diffs
  
          $totalseconds = floor(SPREADSHEET_EXCEL_READER_MSINADAY * $fractionalDay);
          $secs = $totalseconds % 60;
          $totalseconds -= $secs;
          $hours = floor($totalseconds / (60 * 60));
          $mins = floor($totalseconds / 60) % 60;
          // Alterado o formato da data por EVANDRO DE OLIVEIRA.
          $string = date($format, mktime($hours, $mins, $secs, $dateinfo["mon"], $dateinfo["mday"], $dateinfo["year"]));
          //echo"<br>";
        } else if ($type == 'number') {
          $rectype = 'number';
          $formatted = $this->_format_value($format, $numValue, $formatIndex);
          $string = $formatted['string'];
          $formatColor = $formatted['formatColor'];
          $raw = $numValue;
        } else{
          if ($format=="") {
            $format = $this->_defaultFormat;
          }
          $rectype = 'unknown';
          $formatted = $this->_format_value($format, $numValue, $formatIndex);
          $string = $formatted['string'];
          $formatColor = $formatted['formatColor'];
          $raw = $numValue;
        }
  
        return array(
          'string'=>$string,
          'raw'=>$raw,
          'rectype'=>$rectype,
          'format'=>$format,
          'formatIndex'=>$formatIndex,
          'fontIndex'=>$fontIndex,
          'formatColor'=>$formatColor,
          'xfIndex'=>$xfindex
        );
  
      }
  
  
    function createNumber($spos) {
      $rknumhigh = $this->_GetInt4d($this->data, $spos + 10);
      $rknumlow = $this->_GetInt4d($this->data, $spos + 6);
      $sign = ($rknumhigh & 0x80000000) >> 31;
      $exp =  ($rknumhigh & 0x7ff00000) >> 20;
      $mantissa = (0x100000 | ($rknumhigh & 0x000fffff));
      $mantissalow1 = ($rknumlow & 0x80000000) >> 31;
      $mantissalow2 = ($rknumlow & 0x7fffffff);
      $value = $mantissa / pow( 2 , (20- ($exp - 1023)));
      if ($mantissalow1 != 0) $value += 1 / pow (2 , (21 - ($exp - 1023)));
      $value += $mantissalow2 / pow (2 , (52 - ($exp - 1023)));
      if ($sign) {$value = -1 * $value;}
      return  $value;
    }
  
    function addcell($row, $col, $string, $info=null) {
      $this->sheets[$this->sn]['maxrow'] = max($this->sheets[$this->sn]['maxrow'], $row + $this->_rowoffset);
      $this->sheets[$this->sn]['maxcol'] = max($this->sheets[$this->sn]['maxcol'], $col + $this->_coloffset);
      $this->sheets[$this->sn]['cells'][$row + $this->_rowoffset][$col + $this->_coloffset] = $string;
      if ($this->store_extended_info && $info) {
        foreach ($info as $key=>$val) {
          $this->sheets[$this->sn]['cellsInfo'][$row + $this->_rowoffset][$col + $this->_coloffset][$key] = $val;
        }
      }
    }
  
  
    function _GetIEEE754($rknum) {
      if (($rknum & 0x02) != 0) {
          $value = $rknum >> 2;
      } else {
        //mmp
        // I got my info on IEEE754 encoding from
        // http://research.microsoft.com/~hollasch/cgindex/coding/ieeefloat.html
        // The RK format calls for using only the most significant 30 bits of the
        // 64 bit floating point value. The other 34 bits are assumed to be 0
        // So, we use the upper 30 bits of $rknum as follows...
        $sign = ($rknum & 0x80000000) >> 31;
        $exp = ($rknum & 0x7ff00000) >> 20;
        $mantissa = (0x100000 | ($rknum & 0x000ffffc));
        $value = $mantissa / pow( 2 , (20- ($exp - 1023)));
        if ($sign) {
          $value = -1 * $value;
        }
        //end of changes by mmp
      }
      if (($rknum & 0x01) != 0) {
        $value /= 100;
      }
      return $value;
    }
  
    function _encodeUTF16($string) {
      $result = $string;
      if ($this->_defaultEncoding){
        switch ($this->_encoderFunction){
          case 'iconv' :   $result = iconv('UTF-16LE', $this->_defaultEncoding, $string);
                  break;
          case 'mb_convert_encoding' :   $result = mb_convert_encoding($string, $this->_defaultEncoding, 'UTF-16LE' );
                  break;
        }
      }
      return $result;
    }
  
    function _GetInt4d($data, $pos) {
      $value = ord($data[$pos]) | (ord($data[$pos+1]) << 8) | (ord($data[$pos+2]) << 16) | (ord($data[$pos+3]) << 24);
      if ($value>=4294967294) {
        $value=-2;
      }
      return $value;
    }
  
  }
?>
